home *** CD-ROM | disk | FTP | other *** search
/ CD-ROM Data 2005 October / CD Rom Data Ekim 2005.iso / Media / Program.dcr / script_2_script_Prg_Kur.ls < prev    next >
Encoding:
Text File  |  2005-09-23  |  314 b   |  11 lines
  1. global Prgler, PrgNo, ResNo, Resimler
  2.  
  3. on mouseUp me
  4.   Uygulama = the moviePath & "\Programlar\" & Prgler[PrgNo] & "\" & Prgler[PrgNo] & ".exe"
  5.   Ok = baOpenFile(Uygulama, "normal")
  6.   if Ok = 2 then
  7.     Uygulama = the moviePath & "\Programlar\" & Prgler[PrgNo]
  8.     Ok = baOpenFile(Uygulama, "normal")
  9.   end if
  10. end
  11.